home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Sounds Terrific 1
/
Sounds Terrific CD (1994)(Weird Science)(Disc 2 of 2)[!][Amiga-PC].iso
/
modules
/
p
/
piano14.mod
< prev
next >
Wrap
Text File
|
1994-08-04
|
3KB
|
83 lines
PIANO14.MOD - Do a '/COLORS' in message & change colors..:)
Piano Man #38 @6870
Fri Dec 27 14:38:32 1991
7****************************************************************************
6 PIANO14.MOD
1Written by : 3Piano Man 1@6851 (1Ice7NET3)
1Written for: 3WWIV v4.2e (should work with older versions with no problems)
1Difficulty : 3Easy!
1Date : 3December 21th, 1991 (Merry Christmas!)
1While : 3I was in a car wreck last night, and now I'm sitting at home
3with RUSH (Working Man) playing in the background, nothing
3else better to do, so I thought I'd write a mod! :)
1Description: 3This mod allows you to do a '/COLORS' and change your default
3colors while in the message itself. Some guy wrote a mod
3similar, only it was '/MACROS', which is where I got the
3idea for this one. Anyway, it just saves a trip to the
3defaults, simple mod... Try it!
7****************************************************************************
On with the mod:
Back up your source first...
Load up 'MSGBASE.C' and search for this:
And make the changes as they occur, or you can mold and modify it as you wish
this mod isn't engraved in stone, so change and add what you want.
Legend:
= Existing code
% Modify this line
- delete this line
+ add this line
* search for this
Here:
= if (!fsed) {
% sprintf(s,"7Enter message now, max1 %u 7lines.",maxli);
= pl(s);
= nl();
+ prt(7,"Enter '2/ES,/S7' to save the message.\r\n");
+ prt(7,"Enter '2/HELP7' for help.\r\n");
+ prt(7,"Enter '2/COLORS7' to change your default colors.\r\n");
= nl();
Now search for '/TI' and add this RIGHT above it!! If you have the /MACROS
mod in, then this goes right after that...
= if (stricmp(s,"/RL")==0) {
= savel=0;
= if (curli) {
= --curli;
= pl("Replace:");
= } else {
= pl("Nothing to replace.");
= }
= }
+ if (stricmp(s,"/COLORS")==0) {
+ savel=0;
+ prt(2,"You may now edit your colors and change them as you wish...\r\n");
+ change_colors();
+ prt(5,"Please continue, your new colors are now in effect...\r\n");
+ }
= if (stricmp(s,"/TI")==0) {
= savel=0;
= helpl=26;
That's it! Make changes to it, reword it, do whatever. I don't mind. But!
this mod should not screw anything up, so don't come crying to me if your
house is blown up because of this mod.
Oh, and don't worry, I'm not hurt, TOOOO badly. I'll live... My car's
totaly screwed, poor mustang.... :( see ya!
7Milliways ]I[ 3The Spirit of Radio
2618-259-7707
5WWIV v4.2e PIANOLIZED!
1Ice7NET @6851
2Home of 7The RUSH Fan Club NET!
1200/2400bps
524hrs
Fare well......